home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / slaswp.z / slaswp
Text File  |  1996-03-14  |  2KB  |  67 lines
  1.  
  2.  
  3.  
  4. SSSSLLLLAAAASSSSWWWWPPPP((((3333FFFF))))                                                          SSSSLLLLAAAASSSSWWWWPPPP((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      SLASWP - perform a series of row interchanges on the matrix A
  10.  
  11. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  12.      SUBROUTINE SLASWP( N, A, LDA, K1, K2, IPIV, INCX )
  13.  
  14.          INTEGER        INCX, K1, K2, LDA, N
  15.  
  16.          INTEGER        IPIV( * )
  17.  
  18.          REAL           A( LDA, * )
  19.  
  20. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  21.      SLASWP performs a series of row interchanges on the matrix A.  One row
  22.      interchange is initiated for each of rows K1 through K2 of A.
  23.  
  24.  
  25. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  26.      N       (input) INTEGER
  27.              The number of columns of the matrix A.
  28.  
  29.      A       (input/output) REAL array, dimension (LDA,N)
  30.              On entry, the matrix of column dimension N to which the row
  31.              interchanges will be applied.  On exit, the permuted matrix.
  32.  
  33.      LDA     (input) INTEGER
  34.              The leading dimension of the array A.
  35.  
  36.      K1      (input) INTEGER
  37.              The first element of IPIV for which a row interchange will be
  38.              done.
  39.  
  40.      K2      (input) INTEGER
  41.              The last element of IPIV for which a row interchange will be
  42.              done.
  43.  
  44.      IPIV    (input) INTEGER array, dimension (M*abs(INCX))
  45.              The vector of pivot indices.  Only the elements in positions K1
  46.              through K2 of IPIV are accessed.  IPIV(K) = L implies rows K and
  47.              L are to be interchanged.
  48.  
  49.      INCX    (input) INTEGER
  50.              The increment between successive values of IPIV.  If IPIV is
  51.              negative, the pivots are applied in reverse order.
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.